﻿Public Class EFisicas
    Inherits EPersonas
    Private apeynom_cony As String
    Private estado_civil As String
    Private lugar_nac As String
    Private nacionalidad As String
    Private num_cuil As String

    Public Sub New()
        MyBase.New()
        apeynom_cony = ""
        estado_civil = ""
        lugar_nac = ""
        nacionalidad = ""
        num_cuil = ""
    End Sub

    Public Property apeynomcony() As String
        Get
            Return apeynom_cony
        End Get
        Set(ByVal value As String)
            apeynom_cony = value
        End Set
    End Property

    Public Property estadocivil() As String
        Get
            Return estado_civil
        End Get
        Set(ByVal value As String)
            estado_civil = value
        End Set
    End Property

    Public Property lugarnac() As String
        Get
            Return lugar_nac
        End Get
        Set(ByVal value As String)
            lugar_nac = value
        End Set
    End Property

    Public Property nac() As String
        Get
            Return nacionalidad
        End Get
        Set(ByVal value As String)
            nacionalidad = value
        End Set
    End Property

    Public Property numcuil() As String
        Get
            Return num_cuil
        End Get
        Set(ByVal value As String)
            num_cuil = value
        End Set
    End Property

End Class
